home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Programming / DiceSource / lib / alib / doslib.a < prev    next >
Encoding:
Text File  |  1994-02-01  |  560 b   |  39 lines
  1.  
  2.             ;   autoinit if you ever reference DOS
  3.             ;
  4.             ;   (c)Copyright 1990, Matthew Dillon, All Rights Reserved
  5.  
  6.  
  7.             xdef    _DOSBase
  8.             xref    __AutoFail0
  9.  
  10. _LVOOpenLibrary     equ    -552
  11. _LVOCloseLibrary    equ    -414
  12.  
  13.             section autoinit0,code
  14.  
  15.             moveq.l #0,D0
  16.             lea    dosname(pc),A1
  17.             jsr    _LVOOpenLibrary(A6)
  18.             move.l    D0,_DOSBase(A4)
  19.             beq    __AutoFail0
  20.             bra    i10
  21. dosname         dc.b    'dos.library',0
  22.             ds.w    0
  23. i10
  24.  
  25.             section autoexit0,code
  26.  
  27.             move.l    _DOSBase(A4),D0
  28.             beq    l10
  29.             move.l    D0,A1
  30.             jsr    _LVOCloseLibrary(A6)
  31. l10
  32.  
  33.             section libbss,bss
  34.  
  35. _DOSBase        ds.l    1
  36.  
  37.             END
  38.  
  39.